home *** CD-ROM | disk | FTP | other *** search
/ Electronics Boutique Catalog 1996 Spring / 1996 Electronics Boutique Spring CD-ROM (USA).bin / eb / 1316copy.txt < prev    next >
Encoding:
Text File  |  1996-03-06  |  1.3 KB  |  40 lines

  1. if newtitle = TRUE then
  2. Eval("EraseDisplay(@" ^ title number ^ ")")
  3. title number = "1316"
  4. Company = "Zenographics"
  5. title = "SuperPrint 4.0"
  6. Price = 54.99
  7. Demo = false
  8. Button1 = false
  9. Button2 = false
  10. Button3 = false
  11. Button4 = false
  12. system = "Windows 95 3.5"" 
  13. Title Description = "Smooth multitasking and background printing. Unleashes greater productivity with true 32-bit print processing in Windows 95. Automatically selects the best sharpness and contrast enhancements for each page you print. Also lets you view and print Internet images (GIF, JPEG, and PostScript) with drag-and-drop ease."
  14.  
  15.  
  16. -------------------------------------
  17. dline = ""
  18. counter = 0
  19. repeat while dline <> title number
  20. counter = counter + 1
  21. dline = GetWord(1,   GetLine(titl,counter) )   
  22. test(dline = title number, LineInTitle = counter)
  23. end repeat 
  24.  
  25. starttitle = LineInTitle
  26. num of titles shown = 6
  27. endtitle = starttitle + num of titles shown - 1
  28. titles = ""
  29. title highlight = ""
  30. repeat with counter = starttitle to endtitle
  31. nextline = GetLine(titl,counter)
  32. titles = titles ^ SubStr(nextline, 6, CharCount(nextline)) ^ Return
  33. title highlight = Test(title number = GetWord(1, nextline), title highlight ^ SubStr(nextline, 6, CharCount(nextline)) ^ Return, title highlight ^ Return)
  34. end repeat
  35. dpage = CurrentPageID
  36.  
  37. newtitle = FALSE
  38. end if
  39.  
  40.